(term-handle-ansi-escape): Fix off by one error.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0be9284467a5b9b7c5ac4072452ed69ae91f142f..6e0da2e64db92b30ec0103fa16a0c469e5e31993 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2006-05-04  Dan Nicolaescu  <dann@ics.uci.edu>
+
+       * term.el (term-handle-ansi-escape): Fix off by one error.
+
 2006-05-04  Nick Roberts  <nickrob@snap.net.nz>
 
        * progmodes/gdb-ui.el (gdb-force-update): Delete variable...

diff --git a/lisp/term.el b/lisp/term.el
index be4aefaba72400910f98c11804fc13bf07f3ab84..a03970a368bcc47c76fdb1a2c2664799bed1f9e3 100644 (file)
--- a/lisp/term.el
+++ b/lisp/term.el
@@ -3320,7 +3320,7 @@ See `term-prompt-regexp'."
    ((eq char ?r)
     (term-set-scroll-region
      (1- term-terminal-previous-parameter)
-     term-terminal-parameter))
+     (1- term-terminal-parameter)))
    (t)))
 
 (defun term-set-scroll-region (top bottom)